home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / vb / vbprint.exe / VBPRINT.BAS < prev    next >
Encoding:
BASIC Source File  |  1991-10-19  |  738 b   |  26 lines
  1. 'Change the orientation of the printer between Landscape
  2. 'and Portrait. The original code came from Dennis Harrington
  3. 'aided by Costas Kitsos with corrections by Nelson Ford,
  4. 'Public (software) Library
  5.  
  6. DefInt A-Z
  7. Type Orient
  8.   Orientation As Long
  9.   Pad As String * 16
  10. End Type
  11.  
  12. Declare Function PrtOrient% Lib "GDI" Alias "Escape" (ByVal hDc%, ByVal nEsc%, ByVal nLen%, lpData As Orient, lpOut As Any)
  13. Global prtO As Orient
  14.  
  15.  
  16. 'Also included is a routine to change paper bins:
  17.  
  18. Type BinInfo
  19.   BinNumber As Integer
  20.   nBins     As Integer
  21.   res       As String * 8
  22. End Type
  23. Declare Function Escape Lib "GDI" (ByVal hDc, ByVal nEscape, ByVal nCount, Indata As Any, OutData As Any)
  24. Global Const GETSETPAPERBINS = 29
  25.  
  26.